home *** CD-ROM | disk | FTP | other *** search
/ Software Vault: The Gold Collection / Software Vault - The Gold Collection (American Databankers) (1993).ISO / cdr49 / 119_01.zip / CCPPAT.ASM < prev    next >
Assembly Source File  |  1993-06-16  |  896b  |  23 lines
  1. ; This patch causes the CCP of a cp/m 2.x system to look on drive A
  2. ; when you are logged into a drive other than A and call for a .COM
  3. ; file that does not exist on that drive.  Giving an explicit drive
  4. ; reference overrides this feature, so that you can always force
  5. ; the file to be loaded from a specific drive.
  6. ;
  7. msize    equ    60        ; set this to your nominal system size
  8. cpmb    equ    (msize-20)*1024+3400h    ; start of CCP in given sys size
  9. ;
  10.     org    cpmb+6dbh
  11.     jz    patch        ; replaces "jz cpmb+76bh"
  12. ;
  13.     org    cpmb+7f2h    ; replaces an unused area of NOP's
  14. patch:
  15.     lxi    h,cpmb+7f0h    ; get drive from current command
  16.     ora    m        ; accum was 0 on entry, so this fetches drive
  17.     jnz    cpmb+76bh    ; command has explicit drive...give error
  18.     inr    m        ; force explicit reference to drive A
  19.     lxi    d,cpmb+7d6h    ; we need de set up when we
  20.     jmp    cpmb+6cdh    ; re-enter ccp
  21. ;
  22.     end
  23. ┬ü▐═E▌÷├ï▐■C┬û▐═E▌÷═Q▌y═Q▌x├Q▌■R┬